home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 551-575 / disk_559 / apig / apiglib_v11.lzh / globals.rexx < prev    next >
OS/2 REXX Batch file  |  1991-09-28  |  6KB  |  180 lines
  1.  
  2. /*  Global constant File */
  3. /*  This is not all the constants */ 
  4. /*  any additional ones you are gonna have to specify */
  5.  
  6. exit
  7.  
  8. /* ----------------------------------------------------------------------- */
  9. /* --                                                                   -- */
  10. /* --   Intuition Constants                                             -- */
  11. /* --                                                                   -- */
  12. /* --   (probably should only include the ones you need)                -- */
  13. /* --                                                                   -- */
  14. /* --  With version 1.1 this is no longer necessary, you can have all   -- */
  15. /* --  these variables defined to your ARexx macro by calling the       -- */
  16. /* --  function SET_APIG_GLOBALS().  However if you wish you may pick   -- */
  17. /* --  the ones you need from here and not use SET_APIG_GLOBALS().      -- */
  18. /* --                                                                   -- */
  19. /* --                                                                   -- */
  20. /* ----------------------------------------------------------------------- */
  21. setglobals:
  22.  
  23.  
  24. /* Globally Defined Rexx Variables */
  25.  
  26. /* MenuItem Flags & Stuff */
  27.  
  28. CHECKIT    = c2d('0001'x); ITEMTEXT    = c2d('0002'x); COMMSEQ   = c2d('0004'x)
  29. MENUTOGGLE = c2d('0008'x); ITEMENABLED = c2d('0010'x); HIGHFLAGS = c2d('00C0'x)
  30. HIGHIMAGE  = c2d('0000'x); HIGHCOMP    = c2d('0040'x); HIGHBOX   = c2d('0080'x)
  31. HIGHNONE   = c2d('00C0'x); CHECKED     = c2d('0100'x); ISDRAWN   = c2d('1000'x)
  32. HIGHITEM   = c2d('2000'x); MENUTOGGLED = c2d('4000'x); MENUENABLED = c2d('0001'x)
  33. CHECKWIDTH = 19            COMMWIDTH   = 27
  34. LOWCHECKWIDTH = 13         LOWCOMMWIDTH   = 16
  35. NOMENU     = c2d('001f'x)
  36. NOITEM     = c2d('003f'x)
  37. NOSUB      = c2d('001f'x)
  38. MENUNULL   = c2d('ffff'x)
  39.  
  40.  
  41. /* Requester Flags */
  42.  
  43. POINTREL = c2d('0001'x); PREDRAWN = c2d('0002'x); NOISYREQ = c2d('0004'x)
  44.  
  45.  
  46.  
  47. /* Gadget Flags */
  48.  
  49. GADGHIGHBITS= c2d('0003'x); GADGHCOMP= c2d('0000'x); GADGHBOX  = c2d('0001'x)
  50. GADGHIMAGE  = c2d('0002'x); GADGHNONE= c2d('0003'x); GADGIMAGE = c2d('0004'x)
  51. GRELBOTTOM  = c2d('0008'x); GRELRIGHT= c2d('0010'x); GRELWIDTH = c2d('0020'x)
  52. GRELHEIGHT  = c2d('0040'x); SELECTED = c2d('0080'x); GADGDISABLED = c2d('0100'x)
  53.  
  54.  
  55.  
  56. /* Gadget Activation Flags */
  57.  
  58. RELVERIFY     = c2d('0001'x); GADGIMMEDIATE = c2d('0002'x)
  59. ENDGADGET     = c2d('0004'x); FOLLOWMOUSE   = c2d('0008'x)
  60. RIGHTBORDER   = c2d('0010'x); LEFTBORDER    = c2d('0020'x)
  61. TOPBORDER     = c2d('0040'x); BOTTOMBORDER  = c2d('0080'x)
  62.  
  63. TOGGLESELECT = c2d('0100'x)
  64.  
  65. STRINGCENTER = c2d('0200'x); STRINGRIGHT = c2d('0400'x); LONGINT = c2d('0800'x)
  66.  
  67. ALTKEYMAP = c2d('1000'x);
  68.  
  69. /* Gadget Types */
  70.  
  71. BOOLGADGET = c2d('0001'x); PROPGADGET = c2d('0003'x); STRGADGET = c2d('0004'x)
  72.  
  73. /* Prop Gadget Flags & Stuff */
  74.  
  75. FREEHORIZ      = c2d('0002'x); FREEVERT = c2d('0004'x)
  76. PROPBORDERLESS = c2d('0008'x); AUTOKNOB = c2d('0001'x)
  77. KNOBHIT        = c2d('0100'x);
  78.  
  79. MAXBODY        = c2d('FFFF'x); MAXPOT   = c2d('FFFF'x)
  80.  
  81. /* IDCMP Flags */
  82.  
  83. SIZEVERIFY    = c2d('00000001'x); NEWSIZE      = c2d('00000002'x)
  84. REFRESHWINDOW = c2d('00000004'x); MOUSEBUTTONS = c2d('00000008'x)
  85. MOUSEMOVE     = c2d('00000010'x); GADGETDOWN   = c2d('00000020'x)
  86. GADGETUP      = c2d('00000040'x); REQSET       = c2d('00000080'x)
  87. MENUPICK      = c2d('00000100'x); CLOSEWINDOW  = c2d('00000200'x)
  88. RAWKEY        = c2d('00000400'x); REQVERIFY    = c2d('00000800'x)
  89. REQCLEAR      = c2d('00001000'x); MENUVERIFY   = c2d('00002000'x)
  90. NEWPREFS      = c2d('00004000'x); DISKINSERTED = c2d('00008000'x)
  91. DISKREMOVED   = c2d('00010000'x); WBENCHMESSAGE= c2d('00020000'x)
  92. ACTIVEWINDOW  = c2d('00040000'x); INACTIVEWINDOW = c2d('00080000'x)
  93. DELTAMOVE     = c2d('00100000'x); VANILLAKEY   = c2d('00200000'x)
  94. INTUITICKS    = c2d('00400000'x)
  95.  
  96.  
  97. /* Draw Mode Stuff */
  98.  
  99. JAM1 = 0; JAM2 = 1; COMPLEMENT = 2; INVERSVID = 4
  100.  
  101.  
  102.  
  103. /* Window Flags */
  104.  
  105. WINDOWSIZING  = c2d('0001'x);
  106. WINDOWDRAG    = c2d('0002'x); WINDOWDEPTH    = c2d('0004'x)
  107. WINDOWCLOSE   = c2d('0008'x); SIZEBRIGHT     = c2d('0010'x)
  108. SIZEBBOTTOM   = c2d('0020'x)
  109. SMART_REFRESH = c2d('0000'x); SIMPLE_REFRESH = c2d('0040'x)
  110.  
  111. BACKDROP      = c2d('0100'x);     REPORTMOUSE   = c2d('0200'x)
  112. GIMMEZEROZERO = c2d('0400'x);     BORDERLESS    = c2d('0800'x)
  113. ACTIVATE      = c2d('1000'x);     WINDOWACTIVE  = c2d('2000'x)
  114. RMBTRAP       = c2d('00010000'x)
  115. NOCAREREFRESH = c2d('00020000'x); WINDOWREFRESH = c2d('01000000'x)
  116. SUPER_BITMAP  = c2d('0080'x)
  117.  
  118. /* Misc. */
  119. AUTOFRONTPEN = 0;    AUTOBACKPEN = 1;  AUTODRAWMODE  = 1
  120. AUTOLEFTEDGE = 6;    AUTOTOPEDGE = 3;  AUTOITEXTFONT = 0
  121. AUTONEXTTEXT = 0
  122.  
  123. /* Screen Stuff */
  124.  
  125. WBENCHSCREEN = c2d('0001'x);  CUSTOMSCREEN = c2d('000F'x)
  126. SHOWTITLE    = c2d('0010'x);  SCREENBEHIND = c2d('0080'x)
  127. SCREENQUIET  = c2d('0100'x)
  128. HIRES = c2d('8000'x); 
  129. LACE  = 4; 
  130. HAM = c2d('0800'x); EXTRA_HALFBRITE = c2d('80'x)
  131.  
  132.  
  133. /* Raw Key & Mouse Button Stuff */
  134. IECLASS_NULL               = c2d('0000'x)
  135. IECLASS_RAWKEY             = c2d('0001')
  136. IECLASS_RAWMOUSE           = c2d('0002'x)
  137. IECLASS_EVENT              = c2d('0003'x)
  138. IECLASS_GADGETDOWN         = c2d('0007'x)
  139. IECLASS_GADGETUP           = c2d('0008'x)
  140. IECODE_UP_PREFIX           = c2d('0080'x)
  141. IECODE_LBUTTON             = c2d('0068'x)
  142. IECODE_RBUTTON             = c2d('0069'x)
  143. IECODE_MBUTTON             = c2d('006A'x)
  144. IECODE_NOBUTTON            = c2d('00FF'x)
  145. IEQUALIFIER_LSHIFT         = c2d('0000 0001'x)
  146. IEQUALIFIER_RSHIFT         = c2d('0000 0002'x)
  147. IEQUALIFIER_CAPSLOCK       = c2d('0000 0004'x)
  148. IEQUALIFIER_CONTROL        = c2d('0000 0008'x)
  149. IEQUALIFIER_LALT           = c2d('0000 0010'x)
  150. IEQUALIFIER_RALT           = c2d('0000 0020'x)
  151. IEQUALIFIER_LCOMMAND       = c2d('0000 0040'x)
  152. IEQUALIFIER_RCOMMAND       = c2d('0000 0080'x)
  153. IEQUALIFIER_NUMERICPAD     = c2d('0000 0100'x)
  154. IEQUALIFIER_MIDBUTTON      = c2d('0000 1000'x)
  155. IEQUALIFIER_RBUTTON        = c2d('0000 2000'x)
  156. IEQUALIFIER_LEFTBUTTON       = c2d('0000 4000'x)
  157. IEQUALIFIER_RELATIVEMOUSE  = c2d('0000 8000'x)
  158.  
  159. SELECTUP   = IECODE_LBUTTON + IECODE_UP_PREFIX
  160. SELECTDOWN = IECODE_LBUTTON
  161.  
  162. MENUUP     = IECODE_RBUTTON + IECODE_UP_PREFIX
  163. MENUDOWN   = IECODE_RBUTTON
  164.  
  165.  
  166. LAYERSIMPLE   = 1
  167. LAYERSMART    = 2
  168. LAYERSUPER    = 4
  169. LAYERUPDATING = c2d('10'x)
  170. LAYERBACKDROP = c2d('40'x)
  171. LAYERREFRESH  = c2d('80'x)
  172.  
  173. /* for use with ARexx ALLOCMEM() */
  174. MEMF_CHIP   = '0001 0002'x   /* and clear */
  175. MEMF_FAST   = '0001 0004'x   /* and clear */
  176. MEMF_PUBLIC = '0001 0001'x   /* and clear */
  177. MEMF_CLEAR  = '0001 0000'x
  178.  
  179. return 1
  180.